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-TITLE FAT$S373 SATS SYSTEM SERVICE TESTS S$DELTVA (SUCC S.C.) 
-IDENT ‘*Vv04-000' 


+ | 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 
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THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
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INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY ® 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
e 
THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
AND SHOULD NOT BE CONSTRUED 4S A COMMITMENT BY DIGITAL EQUIPMENT ®* 
CORPORATION. * 
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FACILITY: SYSTST (SATS SYSTEM SERVICE TESTS) 


ABSTRACT: 
THIS MODULE CONTAINS SUBROUTINES WHICH, WHEN LINKED 


WITH SUCCOMMON.OBJ, FORM TEST MODULE SATSSS73 TO TEST SUCCESSFUL 
OPERATION OF THE SDELTVA SYSTEM SERVICE. THE SERVICE IS INVOKED 
UNDER VARIOUS INPUT CONDITIONS WITH VARYIN INPUT PARAMETERS. ONLY 
SUCCESSFUL STATUS CODES ARE EXP D IN THIS TEST MODULE. RRECT 
OPERATION OF THE SERVICE FOR EACH OF ITS ISSUANCES IS VERIFIED BY 
CHECKING FOR AN SS$_NORMAL STATUS CODE, EXPECTED RETURN ARGUMENTS 
AND EXPECTED FUNCTIONALITY PERFORM 


ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE, 
DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA, CREATION DATE: JUN, 1977 
MODIFIED BY: 


» = VERSION 
01 ° 
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«SBTTL DECLARATIONS 


INCLUDE FILES: 


EQUATED SYMBOLS: 


OWN STORAGE: 


SATS SYSTEM SERVICE TESTS S$DELTV 


DECLARATIONS 


sass? 


MACROS: 


TNO. DOO TIM ~TIN OF. COO 
MMNNAUUN OOOOOOOO0O0O 


ssi? 
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SATS SYSTEM SERVICE TESTS SDELTVA (SUCC 16*SEP=1984 01:02:24 VAX/VMS Macro V04- Pere 
DECLARATIONS g-SEF- 138 oan UE TP SY eReTSAyeSSoS MAR; 1 dy 
0000 00 71 .PSECT RODATA, RD. NOWRT Ng XE, LON 
0 cg TEST_MOD_NAME:: STRING ayia CesT Mo ULE NAME 
09 73 TESTIMOD“NAME_D: STRING FeeATeee 73> TEST MODULE NAME DESCRIPTOR 
019 74 MSGITINPICTL:~ STRING I.< SSDVA!4ZW: ilo teee 
9 75 ; FAO CTL ETRING FOR MSG1 IN SUCCOMMON.MAR 
0 9 id: MSG3_ERR_CTL:: STRING I,< *SSDVA!4ZW: 'AS> 
So 2 : : FAO CTL STRING FOR MSG3 IN SUCCOMMON.MAR 
00000200 0051 78 PAGESIZE: .LONG 512 : PAGE SIZE IN BYTES 
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SATSSS73 SATS SYSTEM SERVICE TESTS SDELTVA (SUCC 16-SEP-1984 01:02:24 VAX/VMS Ma 
vOu=000 DECLARATIONS etsy 2 :98:9 UETPSY.SR 
gee 9 »PSECT RWDATA,RD,WRT,NOEXE ,LONG 

PRIVMASK: -BLKQ ; R OF etd te 

§ PAGCNT_ERG: ~BLKL 1 ; PAGCNT ARGUMEN 
C RETADR_ERG: -BLKQ  } ; RETADR ARGUMENT 

if 14 4 INADR_CVA: -BLK 1 : INADR ARGUMENT 

00 1¢ 5 INADR: -BLKQ } ; INADR ARGUMENT 

f 4 § RETADR: -BLK 1 ; RETADR ARGUMENT 
f STARTADDR: -BLKL 1 : STARTING ADDR O 

4 5 ENDADDR: ~BLKL 1 ; ENDING ADDR OF 
0 8 0034 DISPL: -BLKL 1 ; NO. OF PAGES (D 

00000039 0038 0 NZERR: BLKB 1 ; NON-ZERO ERROR 


TO DELETE 
NS NO N-Z ERROR 
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¥042000 CONDITION TABLES ~SeE18Be Bui 8SiF> FORTHRS Sacco WOeeOe anes eM 3, 
} .SBTTL CONDITION TABLES 
: eeeee CONDITION TABLES FOR DELTVA SYSTEM SERVICE teeee 


COND 1 -NOTARG <PREV IOUS CONDITION OF DELETED PAGES>,- 
PREVIOUSLY CREATED BY CR ET VA>,= 
<PREVIOUSLY CREATED BY EXPREG>.= 
<PREVIOUSLY NON-EXISTENT>,= 


COND  2,NOTARG,<ORDERING OF INADR PAIR> »= 
<1ST ADDR LESS THAN OR EQUAL TO’ 2ND 
<15T ADDR GREATER THAN OR EQUAL o OND ADRD, . 


MM TNH AAHRAOOOOOOOOOOOO 2-4 


COND 3,LONG,<ACMODE>,=- 
<KERNEL>,= 
<EXEC>,= 
<SUPER>,=- 
<USER>,-=- 
00000000 LONG Sog0 KERNEL 
00000001 6 LONG SL$C_EXEC 
0000000 LONG pet sem SUPER 
0000000 LONG PSLS$C_USER 
COND 4,NOTARG, por th OF DELETED PAGES>,=- 
<END OF PR ot oy REGION>,-=- 
<END OF CONT GION>,- 


<MIDDLE OF CONTROL REGION>,- 
«LONG 0.1,2,3 
COND 5. oe bhnge F <PAGE COUNT>,=- 
<ONE PAGE> 


<SMALL COUNT>, - 
<LARGE COUNT>,=- 


- LONG 1 
- LONG 5 
- LONG 25 


-PSECT SATSSS73,RD,WRT,EXE 


00000003 00000002 00000001 00000000 
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v04-000 TM_SETUP, TM_CLEANUP =3Ee=1 382 81:98:93 AAT eeY SRE IGATSSSTS.MAR:1 ° f) 
0 5 : .SBTTL TM_SETUP, TM CLEANUP 
§ ; FUNCTIONAL DESCRIPTION: 
1 : : TM_SETUP AND TM_CLEANUP ARE CALLED TO PERFORM 
0 140 ; REQUIRED HOUSEKEEPING AT THE BEGINNING AND END, RESPECTIVELY, OF 
90 141 ; TEST MODULE EXECUTION. 
000 148 : CALLING SEQUENCE: 
38 146 ; SSBW TM_SETUP BSBW TM_CLEANUP 
00 147 : INPUT PARAMETERS: 
0000 148 : 
0000 149: NONE 
0000 150: 
0000 151 : IMPLICIT INPUTS: 
0000 138 ; 
0000 153; NONE 
0000 154: 
0000 155 : OUTPUT PARAMETERS: 
0000 156: 
0000 157; NONE 
0000 158: 
0000° 159 : IMPLICIT OUTPUTS: 
0000 160: 
0000 161: TM_SETUP: COND TABLE INDEX REGISTERS (R2,3,4,5,6) CLEARED; 
0000 162 : ALL PRIVILEGES ACQUIRED. 
0000 163 : 
0000 164 : COMPLETION CODES: 
0000 165: 
0000 166: EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
0000 167; 
0000 168 ; SIDE EFFECTS: 
0000 (169 : 
0000 170: SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
000 171: (VIA RSB) IF ERROR ENCOUNTERED. 
000 1% ; 
000 173 :-- 
9009 174 
0000 175 
0000 1% 
0000 177 TM_SETUP:: 
2 D4 9 128 CLRL Re > INITIALIZE 
D4 17 CLRL OR : .. CONDITION 
4 04 4 180 CLRL RG ae SA 
5 (4 6 181 CLRL RS t seceee INDEX 
: 4 0 1 é Ob Meee * Gee as epee . REGISTER 
FFF3" 30 A 1 BSBW MOD_MSG_PRINT : PRINT TEST MODULE BEGIN MSG 
00000900" EF 90000000 ‘EF DE OD 184 MOVAL TEST ROD _suct TMD_ADDR : ASSUME END MSG WILL SHOW SUCCESS 
03 00 90000000 BF F 18 185 INSV  #SUCTESS7#0,#3,MOB_MSG_CODE ; ADJUST STATUS CODE FOR SUCCESS 
$8 1 $ MODE  10,5$,KRNL ; KERNEL MODE TO ACCESS PHD 
59 00000000'°9F pO 0048 1 MOVL a#CTL$GL_PHD,RO : GET PROCESS HEADER ADDRESS 
00000000'EF 69 DE O04F 1 8 MOVAL PHDSG_PRIVMSK(R9) PRIVMASK ; GET PRIV MASK ADDRESS 
36 1 MODE FROM,5$ ; BACK TO USER MOD 
57-190 PRIV ADD, ALL ; GET ALL PRIVILEGES 
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TM_SETUP, 


05 + 
FFA’ ae 0B 
5 0086 


CLEANUP “SEP-1984 04:33:17 CUETPSY.SRC 5SaT SSS (1) 
191 SSE TERN $ TEST_MOD_NAME_D ; SET PROCESS NAME 

136 S_CHECR NORMAL ; CHECK STATUS CODE RETURNED FROM SETPRN 

19 388 ; RETURN TO MAIN ROUTINE 

194 TM_CLEANUP: : 

195 BBW MOD_MSG_PRINT ; PRINT TEST MODULE END MSG 

196 RSB ; RETURN TO MAIN ROUTINE 
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; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
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BSBW CONDX 
WHERE X = 1,2,3,4,5 


INPUT PARAMETERS: 
R 
CONFLICT SET TO NON-ZERO IF COND TABLE CONFLICT DETECTED. 


-SBTTL CONDITION SUBROUTINES = SETUP AND CLEANUP 
IMPLICIT OUTPUTS: 


FUNCTIONAL DESCRIPTION: 
R2,3,4,5,6 PRESERVED 


CONFLICT = 0 
COMPLETION CODES: 
NONE 


BSBW CONDX 
IMPLICIT INPUTS: 
2 


NONE 
RSB 
CLEANUP: : 
RSB 
RSB 
RSB 
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CALLING SEQUENCE: 
f 
OUTPUT PARAMETERS: 


SIDE EFFECTS: 


COND2_CLEANUP: : 


+ 
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; COND! 
: COND1 
? COND 
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SETU 


CONDS:: 


AOGAOCOOIMIMUM WN 
AUF WOWOONAM OF 


ESTS SDELTV 


ef RSB 
COND4_CLEANUP: : 
RSB 


RSB 
CONDS CLEANUP: : 
RSB 


SrSEp=1986 04:98:17 EUETPSY.SREISAYSSS/5.MAR: 1 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 


a —e— — 


: NONE 
; IMPLICIT OUTPUTS: 
a. 
; COMPLETION CODES: 
NONE 
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v04-000 FORM_CONDS g7 SEP 38 8) £9: 3 UETPSY.S y SRE ISATSSS7S.MAR: 1 anlar} { 

if .SBTTL FORM_CONDS 
C : FUNCTIONAL DESCRIPTION: 
¢ M_CONDS FORMATS AND PRINTS INFORMATION ABOUT 
c THE CURRENT ELEMENT IN EACH OF THE CONDITION TABLES. 
o¢ ; CALLING SEQUENCE: 
o¢ BSBW FORM_CONDS 
o¢ : INPUT PARAMETERS: 
O¢ NONE 
o¢ : IMPLICIT INPUTS: 
OC R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
0c FOR COND TABLES 1,2,3,4,5, RESPECTIVELY. 
OC OR X = 1,2,3,4,5 : 
0c cONOX’T’= TITLE TEXT FOR CONDX TABL 
OC CONDX"TAB - ELEMENT TEXT FOR CONDX TABLE 
ye CONDXC = CONTEXT OF ree CONDX 
oc CONDX"E = DATA ELEMENTS OF THE COND TABLE 
0 
OC 
OC 
OC 
0 
0 
0 
0 
0 
0 
0 
0 
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0 > SIDE EFFECTS: 
0 NONE 
0c 
OC _— 
OC 
Oc 1 
OC é 
00¢ FORM_CONDS: : 
oc 4 $FAO_S MSG1_INP_CTL,FAO_LEN, FAO_DESC. TESTNUM 
E 5 | FORMAT CONDITIONS HEADER MSG 
FF1D" 30 E © BSBW our PUT_MSG + ee. AND 
14 90 1 O0€E #COND1~C, #NULL + IS°CONDITION 1 NULL ? 
12 00E : BNEQU : NO <= 
00cB:Cé«31 OE pe BRW FORM_CONDSX t YES == SUBROUTINE IS ©'NISHED 
00000000" EF 0083 oooe er D oe 1 MOVAL COND1_T sfhe! ; SAVE ADDRESS OF CONDITION 1 TITLE FOR FAO 
00000000 ' EF 900 e* EF42 p OF é MOVL CONDI Tie R21] MSG 8B ; SAVE ADDR OF COND 1 CURR TEXT ELT FOR FAO 
00 19 MOVE  #CON G_¢Tx SAVE CONDITION 1 CONTEXT FOR FAO 
1 4 MOV_VAL COND! bo ORT “EtR2), MSG baial; GIVE COND 1 DATA VALUE TO FAO 
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00000000'EF _ 000000BC'EF 
00000000'EF _000000D4'EF43 
00000000'EF 00 
FECB" 
14 04 
03 
0079 

00000000°EF _0000012F ‘EF 

0000000" EF 90000187 °EF 44 
00000000'EF 04 
FE96" 
14 99 

00000000°EF — 0000016E'EF 
00000000"EF 00000189" EF 45 
00000000'EF 00 
FE70" 
14 90 

00000000'EF — 00000207" EF 
00000000'E? _00000213'EF46 
"00000000°EF — 00 
FEGA' 
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20$: 


30$: 


FORM_CONDSX: 
RSB 


-SEP-19 1: 4 VAX/VMS Macro V04- Page 11 
=SEP-19b6 te 9¢: 3 UETPSY. ates MARST 4) 
WRITE_MSG2 ; FORMAT AND WR TE CONDITION 1 MSG 
WCOND2” es #NULL 3 Ie CONDITION he 
FORM_CONDSX t YES == SUBROUTINE IS FINISHED 
COND MSG,A : SAVE ADDRESS OF CONDITION 2 TITLE FOR FAO 
COND? STAB R3],MSG_B ; SAVE ADDR OF COND 2 CURR TEXT ELT FOR FAO 
MSG_CTXT~ SAVE DITION 2 CONTEXT AO 
CoNbe z Ce ND2_ECR3],MSG JbATAY GIVE COND 2 DATA VALUE TO FAO 
WRIT ; FOR RMAT AND oR Ie. CONDITION MSG 
#COND3_C,#NULL ; Is COMI TION 2 Mu 
FORM_CONDSX + YES == SUBROUTINE IS FINISHED 
COND ss ; SAVE ADDRESS OF CONDITION 3 TITLE FOR FAO 
COND sThB Ra) MSG_B ; SAVE ADDR OF COND 3 CURR TEXT ELT FOR FAO 
aconps ot MSG_CTXT SAVE CONDITION 3 CONTEXT FOR FA 
t, COND3_ etRsd, MSG BATAY GIVE COND 3 DATA VALUE TO FAO 
ORITEA MSG : FORMAT 1 AND WRITE CONDITI MSG 
#CONDS _C,#NULL : iS. CONDIT iON N 4 NULL ? 
FORM COND Sx : YES == SUBROUTINE IS FINISHED 
COND Stas! : SAVE ADDRESS OF CONDITION 4 TITLE FOR F 
pak The R54] MSG_B ; SAVE ADDR OF COND 4 CURR TEXT ELT FOR 
#CONDS _C,MSG_CTXT SAVE CONDITION 4 CONTEXT FOR FA 
COND, C CONDE etRSI, MSG_ BATA = solve COND 4 DATA VALUE TO FAO 
E-MSG2 ; FORMAT AND ae CONDITION 4 MSG 
#CONDS_C,#NULL : IS CONDITION LL ? 
FORM_CONDSX : YES == SUBROUTINE IS FINISHED 
CO 1 HS + SAVE ADDRESS OF CONDITION 5 TITLE FOR 
COND5 “TAB EREIMSG_ ; SAVE ADDR OF COND 5 CURR TEXT ELT FOR 
#CONDS_C,MSG_CTX VE CONDITION 5 CONTEXT FOR FAO 
CONDS t cONSS ECR, MSG_ batal : GIVE COND 5 DATA VALUE TO FAO 


ND 
E-mSG2 ; FORMAT AND WRITE CONDITION 5 MSG 
; RETURN TO CALLER 
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VERIFY 


4 
SATSSS73 SATS SYSTEM SERVICE TESTS $DELTVA (SUCC 16-SEP=1 4 VAX/VMS © V04- Page 13 SA 
y042000 VERIFY g- Sere} 3B 8) ‘9: 3 UETPSY.S aE: MAR; 1 . (1) vc 
187 418 se 
1B7. 4] 
iby 34 
1B7. 4 ¢ VERIFY:: 
00000000" EF 95 01B7 & TSTB CELAG : SHOULD CONDITIONS BE PRINTED ? 
3 13 O1BD 424 BEQL $ + NO == CONTINUE 
FEFF 3 18 4 . BSBW  FORM_CONDS + YES == FMT & PRINT ALL CONDS FOR THIS T.C. 
QOOOOO2ZC"EF 04 1¢3 4 5 ; CLRL STAR ; CLEAR STARTING ADDR OF AREA TO BE DELETED 
OEDEREter ORR tee BS EE Ge RR ERT gee ea ies 17 son ast 
OouDoTP EF as D1 1DF 4 0 CMPL foube WT eERSS pyre : A i PAGES IN MIDDLE OF A REGION ? 
oo000008'EF 05 0 O1E9 4 4 sas ADDL2 . PAGCNT_ERG + YES == ADD SOME PAGES 
Sit 434  —s MODE ; GO TO KERNEL MODE TO ISSUE SERVICE 
0 13 435 SEXPREG_S S"BAGEAT eR ,RETADR ER g. > 
0 3-4 6 MODETR4],COND4_ELR5) ; ISSUE PRELIM $.S. TO GET SOME PAGES 
3, MODE FROM. et :' BACK TO USER MODE 
0235 438 SS_CHECK NORMAL : CHECK FOR NORMAL RETU 
00000030°EF  00000010°EF pO 0263 439 MOUL —-RET ADR “ERG+4,ENDADDR : GET ENDING ADDR OF AREA TO BE QELETED 
OOOOOO2ZC'EF  OO00000C'EF 00 0 of 440 MOVL  RETADRTERG,STARTADDR =: GET TENTATIVE ASTAR T ADDR 
00000034"EF  O0000008'EF 01 0 79 441 CMPL PAGCNT~ERG.DISPL : WERE 5 PAGES ADDED TO DI SPLACERENT ? 
1c 613 «0284 44g BEQL 45$ : NO == LEAVE STARTADDR ALON 
08 ooDoIE? EFS Fo O5BR ate BLBE EONDS. 1 68S gos i VES <= STARTADDR TO BE HODIF ALONE 
59 59 «CE O 93 44s oa MNEGL R9,R + PROGRAM REGION == NEGATE R9 
59 05) «(C6 8 3B 447 ~~ MULL2.~—s #5, RO ; GET LENGTH OF 5 PAGES 
0o00002zc"EF 59 CO : ’ 448 a. ADDL2 R9.STARTADDR : COMPUTE START ADDR OF AREA TO BE DELETED 
02A2 450 MODE ‘TO, 508, KRNL : INTO KERNEL TO DO A STORE 
00000030'FF  O0000000'EF 90 6 C3 431 OVE ONES. @ENDADOR : INDICATE We E WERE HER ca 
01 52 91 O2D1 re MPB Rg a : OND CONDITION N 1 ELEMENT ? 
03 12 0204 454 BNEQU 73$ : NO == CONTINUE 
015F = 31 D6 439 ae BRW 71$ : YES == LEAVE EXPANDED REGION AS IS 
02 52 91 02D9 re "CPB sR, #2 ; 3RD CONDITION 1 ELEMENT ? 
03 12 O2DC 438 BNEQU 74$ + NO == CONTINU 
0068 31 DE 439 at BRW 60$ : YES == GO CONTRACT REGION 
00000014 'EF MOO2ZC'EF 0D E1 461 "MOVE. «= ss STARTADDR, INADR_CVA : MUST BE 1ST COND 1 ELEMENT 
OOO oo 1B Er sided SEF PB EC ise MOVE ENDA DR, 2 HADR, CUA+4 Prams OR DELT 
1 i LTVA_S °thADA INADR_CVA : 
i, 8 “ai ODEZACMOBECRG]—s; DELETE EXPANDED AREA 
Hh hati BEE fogsey son 
F 468 $,K : INTO KERNEL FOR A PRELIM CRETVA 
: if SCREIVA.S S TINADREINADR CVA, ncnové -ACRODE 
NORMA : CRE CK FOR NORMAL R 
6F (11 cf ire sit gs CHECK, MO ¥ : ... AND GO OE TERM INE UORDER OF INADR PAIR 
(9 47% “MODE ~=—s—«- TO, 68 $. KRINL : KERNEL MODE FOR CNTREG 


00000030'EF 


00000000 ' EF 


00000024 ‘EF 
00000028 ' EF 


O'EF 
00000000" EF 


0000002C "EF 
5A 000000 
5B 000000 
5A 0000030' 
5B ddirta 
0000001C EF 
00000020' EF 
0000001C ‘EF 
00000020'EF 
00000000 * 8F 
00000000' 
00000000 EF 
02 
0000001C 
00000020 
000000 
000000 
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So 
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series SYSTEM SERVICE TESTS SDELTVA duce Ig° Heeb 7 }: 93: #6 AX/VMS 


71$: 


72$: 


79$: 


SEP=1984 
SCNTREG_S DISPL,,ACMODECR4],COND4 
MODE _— FROM, 68$ : 
SS_CHECK NORMAL : 
CMPL STARTADDR, ,ENDADDR : 
BGTRU ; 
MOVL STARTADDR R10 ; 
MOVL ENDA R,Ri1 : 
BRB es ; 
MOVL — ENDADDR, R10 F 
MOVL § STARTADOR,R11 ; 
TSTB R3 : 
BEQL 77$ 3 
MOVL R11, INADR ; 
MOVL R10. INADR+4 ; 
BRB 79$ ; 
MOVL R10, INADR ; 
MOVL R11. INADR+4 : 
MODE  10,80$,KRNL ; 


: weenee SYSTEM SERVICE CALL WHICH IS THE 


SDELTVA_S Fenn ho RETADR, ACMODECR4] 


MODE ; 
CMPL RG #5S$_NORMAL F 
BEQLU 81$ 

MOVL osss NORMAL , EXPV 


MOVL 


CMPB R2,#2 

BRW VERIFY 

CMPL + etna 
CMPL pn eee 
VERIFYX 

ae INADR ,EXPV 


83$: 


85$: 


Becre Aire | Page 14 
UETPSY.SRCIJSATSSS735.MAR; 1 (1) 
~ECRS) 

TRACT REQUESTED size (NOT THE EXTRA 5) 
N T BACK TO USER MODE 
CHECK FOR NORMAL RETURN 


FIND LARGER ADDRESS 

STARTADDR LARGE 

SMALLER VALUE IN R10, 
RGER IN R11 


; CONTINU 
; vaheteg 9 VALUE IN R10, 


- LARGER IN R11 


1ST CONDITION ako eres ? 
YES == LOWER ADDRESS GOES FIRST 
NO -- HIGHER ADDRESS GOES FIRST 


CONTINUE 


; LOWER ADDRESS GOES FIRST 


INTO KERNEL MODE 
SUBJECT OF THIS TEST CASE ***#e«« 


BACK TO USER 
vee wag 3S . YING ? 


+ NO == LOAD UP EXPECTED AND 


RECEIVED VALUES, THEN EXIT 


V 
ERR_EXIT LONG, <INCORRECT STATUS tobe RETURNED FROM DELTVA> 


3RD CONDITION 1 ELEMENT ? 


NO == CONTINU 


YES == DON'T CHECK UNPREDICTABLE RETADR 


pee pe) ty DELETE THE 1ST PAGE ? 


0 R 
HOW ABOUT THE WHOLE RANGE ? 


NO -- ERROR 


CONTINUE 


; LOAD UP EXPECTED A 


ND 
RECEIVED VALUES, THEN EXIT 


RETADR, RECV 
ite EXIT QUAD, + UNEXPECTED VALUE FROM’ DELTVA FOR>,= 


RETADR P 
RSB ; 


VERIFYX: 


RETURN TO CALLER 


2 need 


SATSSS73 
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Ms SERVICE TESTS SDELTVA (SUCC 16-SEP-1984 9) 09:48 AX/VMS Macro V04 399. Page 
4:35:17 Ss SATSSS MAR; 1 


“SEP=1984 UETPSY.SRCJ 
~SBTTL VFY_ CLEANUP 


FUNCTIONAL DESCRIPTION: 


VFY_CLEANUP EXECUTES SYSTEM SERVICES TO UNDO THE 
EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY_CLEANUP MUST 
ASSUME THAT VERIFY MAY NOT HAVE EXECUTED IN ITS ENTIRETY (IF AN 
ERROR IS FOUND). ALSO, VFY_CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT 
ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS; THIS IS~REQUIRED 
IN THE EVENT THAT VFY_CLEANUP IS CALLED DURING ERROR PROCESSING, 
WHEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN 
POSSIBLY DISCOVERING A SECOND ERROR. 


CALLING SEQUENCE: 

BSBW VFY_ CLEANUP 
INPUT PARAMETERS: 

NONE 
IMPLICIT INPUTS: 


R2,3,4,5,6 CONTAIN CURRENT CONDIT 


ION TABLE INDEX VALUES 
cone CON ND TABLES 1,2,3,4,5, RESPECT s 


IVELY 


= 1,2,3,4,5 : 

~ CONDX E - ADDRESS OF TABLE OF DATA yaLles FOR COND 
TABCE. IF THE CONTEXT OF TABLE X IS A gly SER VICE 
ARGUMENT, THE ARGUMENT NAME MAY ee USED AS A SYNONYM 


FOR CONDK_E” 

OUTPUT PARAMETERS: 

NONE 
IMPLICIT OUTPUTS: 

NONE 
COMPLETION CODES: 

EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
SIDE EFFECTS: 


SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
(VIA RSB) IF ERROR ENCOUNTERED. 


STL. STARTADDR ; DID REGION EVER GET ACQUIRED ? 
BNEQ $ ; YES == CONTIN 
BRW VF Y_CLEANUPX : NO == JUST GET OUT NOW 


i 
wl 


“~~ 
= 


Es HS ERS 
SE RE 
$i 
it 
01 QOOO01F7"EFSS D1 0642 
68 18 Q64A 
64C 
66F 
é 
68 
687 
05 0687 
0688 
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AX/VMS Macro V 


~$EP-1986 4:58:47 


MOVL May dty sal INADR 
MOVL ENOABOR Bay a tees 


MODE KERNEL MODE FOR DELETE 
SDELTVA_S SO FMADReTNADR, acroocaachodl tt 
: DELETE EXPANDED AREA 
MODE FROM 108 + BACK TO USER MOD 
SS CHECK + CHECK FOR NORMAL RETU 
CMP CONDE nECRS, #1 WAS AREA IN AMIDDLE™ oF A REGION ? 
BLEGU vey NO <= TI x 
MODE g° ee KERNEL MODE TO ISSUE CNTREG 
SCNTREG 4 o, a COND4 eked GET RID OF THE EXTRA 5 PAGES 
MODE “FROM, 30$ ; BACK T 
SS$_CHECK NORMAL + CHECK FOR NORMAL RETURN 


VFY oALEASy +. 


; RETURN TO CALLER 
ain 


Page 
UETPSY.SRCIJS SSa¥egs73. MAR; | ™ () 
; READY FOR DELTVA IN CASE SUBJ NEVER ISSUED 


_<<<e-eeeeee eae LLL CC LL LLL LD 
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0 V04- 

Symbol table “SEP-1984 UETPSY .SREISATSES73.MAR; 1 

$$ = 8 00571 F 04 ENDADOR 00000030 R 3 
SSSCHARS = f EXPV ekeneeee x 4 
SSSCHARS1 = FAO_DESC aeneeeee =X 04 
SSSCHARS = B FAQ LEN eeeeeene =X & 
SSSCHARS = FORM_CONDS 08880 RG 4 
SSSCHARSS = 0 FORM CONDSX 1B6 R 4 
SSSCHARSS = 8 INADR 44 O1C R ; 
$SSCOND A = 8 0 INADR_CVA 8 14 R 
SSSSTRINGS = Q LONG = 00000004 G 
SS$$STRINGS2 = 00000005 MOD_MSG_CODE eeeneeee =X 04 
$812 = 99000006 MSGT-INP_CIL. 00000019 R 3 

= 
ACHODE GO00013¢ R03 NSGS-ERR=CTL 00000039 RG 08 
BYTE = 00000001 G MSG_K teeneeee =X 04 
CFLAG ekkkeeee x 04 MSG_B kkkekene x 4 
CHMRTN eeeneees =X 04 MSG_CTXT aeeeeeee =X 04 
CHM_ CONT teeeenee =X 04 MSG_DATA1 eenneeee =X 04 
COMP SC weneeeee§ §=6X = (04 NOTA = 00000000 G 
CONDT 00000087 RG 04 NULL = 00000014 G 
COND1_C = 00000000 NZERR 00000038 R 03 
COND1_ CLEANUP 4444 4: RG 04 ONES aeeeenee §=6©X = 04 
COND1_E si it 14 R 03 OUTPUT_MSG weeeeeee =X = 04 
COND1_H 00000051 RG 03 PAGCNT_ERG 00000008 R 03 
COND1_T 00000039 R 03 PAGESIZE 00000051 R 02 
COND1_TAB 44-4444 R 03 PCV aereeeee =X | 04 
COND2 444 4 RG 04 PHD$Q_PRIVMSK = 00000000 
CONDE = 00000000 PRIVMASK 0000000 R 03 
COND2_ CLEANUP 444 86 RG 04 PRIV_ARGS = 00090002 
COND2_ 0000012F R 03 PROCESS ERR eeeeeeee =X 04 
COND2_H 00000003 RG 03 EXEC = 00000001 
COND2 _ 444 4 R 03 PSLSC_KERNEL = 0000000 
COND2_TAB 00000D4 R bz PSLSC_SUPER = 0000000 
COND 00000088 RG é PSLS$C_USER = 0000000 
COND3_C = 000 43 QUAD = 00000008 6G 
COND 3_ CLEANUP i eee RG 04 RECV eerereee =X ©6046 
COND 3_ QOOO1S5E R 03 REST_REGS aeeeneee =X | (04 
COND3_H 00000136 RG Bs RETADR 4 it R 03 
COND 3_ 0000 \¢f R Q RETADR_ERG GO0000C R 03 
COND3_TAB 9000 137 R 05 SAVE_REGS eeeeeeee =X 04 
COND4 00 BeRD RG 4 SS$_RNORMAL arenteee =X 4 
COND4 _C = 00000000 STARTADDR 0000002C R 3 
COND4 _ CLEANUP 0 pees RG SUCCESS aeeeeeee =X 4 
COND4~E O0001F? R SYSSCMKRNL eeeeeeee GX 04 
COND4 _H 188 RG SYSSCNTREG aeenenee §=GX 4 
COND4_T 1 3 R SYSSCRETVA aeeeeeee GX 4 
COND4_TAB 189 R SYSSDELTVA atareeee §=GX 4 
CONDS sit RG & SYSSEXPREG aeeeeeee GX 4 
COND5_ a SYSSFAO eteetese =X 4 
COND5_ CLEANUP CO RG 4 SYSSSETPRN eeneeene §6GX 4 
COND} ~ 900240 R SYSSSETPRV teeeeees GX 04 | 
COND5-H 12 RG TESTNUM seeeeeee =X 04 
COND5_T 4 ’ R TEST _MOD_NAME £800 0008 RG 
COND5~ TAB 3. R TEST-MOD-NAME_D 000009 R | 
CTL$GC_PHD eeneneee =X 06 TEST-MOD~ SUCC eeeteree = X 
ss * BOBBENE ngs TPR sagniat ack | 
piste G0000036 mgs IR ELEAM gpgaagss met 
| 
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SATS SYSTEM SERVICE TESTS S$DELTVA (SUCC 16-SEP=1 4 VAX/VMS Macro V04- Pa 
Symbol. table Brea obe burssise HORT Hee eee soa ees os. mans1 Fase 


rity. 1B7 RG 4 
VERIF YX HS 2 " 
VF Y_CLEANUP B9 RG 4 
VF Y-CLEANUPX R 4 
= 00000002 G 
WRITE _MSG2 teeeeneer =X 04 
ecco se ene aen eas + 
! Psect synopsis H 

PSECT name Al Location PSECT No. Attributes 

ABS 00000000 0.) 00 ¢ Q.) NOPIC USR ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 

$$ Boop O RES ( g-? ( 1.) NOPIC USR CON ABS LCL NOSHR EXE’ RD WRT NOVEC BYTE 
RODATA 00000 ( ) ( -) NOPIC USR CON REL LCL NOSHR NOEXE RD NOWRT NOVEC LONG 

ATA Reo boses ( ; 8.) 8 ( 3.) NOPIC USR CON REL LCL NOSHR NOEXE' RD WRT NOVEC LONG 
SATSSS73 0000068 ( 1720.) 4 ( 4.) NOPIC USR REL LCL NOSHR’ EXE RD WRT NOVEC BYTE 

eee een aw eaeee momar enan eee 
H Performance indicators ! 

Phase Page faults CPU Time Elapsed Time 
Initialization 29 0:00: 08 00:00:00.51 
Command processing 119 0:00:00.6 BD BR 06 +a? 
Pass 1 269 00:00:08.13 00:00:17.34 
Symbol table sort Bp BR: 56 +89 #81 «6 
Pass 2 16 Ba! 0:02.17 00:00:05.8 
Symbol table output 18 0:00: 42 00:00:00.10 
Psect synopsis output 5 00:00:00. 00:00:00.03 
Cross-reference output 0 00:00:00.00 8 88:8 -88 
Assembler run totals 609 00:00:11.74 00:00:27. 


Tee working set Limit was 900 pages. 
43984 bytes (86 pages) of virtual memory were used to buffer the intermediate code. 
There were 20 pages of symbol table space allocated to hold 349 non-local and 69 local symbols. 
599 source Lines were read in Pass 1, producing 26 object records in Pass 2. 
pages of virtual memory were used to define 28 macros. 


tere ete ses ene we wee merece rer 


! ; Macro Library statistics ! 


oe 


Macro Library name Macros defined 
=$35Se0unse: et eT ee -MLB; ! ? 
S25SSDUAZE SYS IBISTARLET. Pale: 52 13 
TOTALS (all libraries) 2 


671 GETS were required to define 25 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:SATSSS73/0BJ=OBJ$:SATSSS73 MSRC$:SATSSS73/UPDATE=(ENH$:SATSSS73) +EXECMLS$/LIB*+SHRLIBS$:UETP/LIB 


SA 


NT CORPORATION 
D PROPRIETARY 
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